home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / PRGMMING / CPUGET.ZIP / GETCPU2.BAS < prev    next >
Encoding:
BASIC Source File  |  1994-12-08  |  663 b   |  26 lines
  1. '****************************GETCPU2.BAS************************
  2. 'Fann.....tastic! just made a Quick Library from GETCPU2.OJB by
  3. 'following the information in the QuickBASIC 4.5 "Programming in BASIC"
  4. 'book (page 386).
  5. '
  6. 'The command is:
  7. 'LINK /q GETCPU2.OBJ
  8. '
  9. 'and then follow the prompts, with {Enter} until it asks for:
  10. '
  11. '      Library[LIB]
  12. '
  13. 'then type in the =correct= QuickBASIC library as....
  14. '
  15. '      BQLB45.LIB
  16. '
  17. 'John De Palma on CompuServe 76076,571
  18. '
  19. '12/8/94
  20. '================================================================
  21.  
  22. DECLARE FUNCTION GetCPU2%
  23. 'get rid of the leading space
  24. PRINT "CPU = 80"; LTRIM$(STR$(GetCPU2%))
  25.  
  26.